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INTRODUCTION : 


In using the plotter, I have found the plotting 
routines which were written at Cal Tech to be much more 
versatile and easier to use than the Cornell routines. 

In addition, several of the Cal Tech routines simply do 
not have any equivalent counterpart In the Cornell library. 
Since the Cal Tech routines are not part of the Cornell 
system library, they must be Inserted (In object module 
form) In the link edit step of a FORTRAN Job. At the 
present time these object decks are all stored as CP's 
under account ACX. In addition, the original source 
decl'j are In my office. In the future. Jay Ooguen will 
be In charge of both the source decks and the CP's. The 
few Cornell routines which i recommend using are automatically 
link edited In when they are called and do not have to 
be Inserted Into the deck. 

In using this manual. It Is Important to obtain 
a copy of OCS memo TN-39 which describes the "extemals" 
of using the , lotter (l.e. how to request pen type, pen 
color, type of paper, etc.). The other OCS manual "FORTRAN 
plotting routines for the COMPLOT DP-1 Plotter" Is not 
necessary, however, as any necessary material from It 
Is reproduced here. 
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General Description of the Plotting Routines 

The various plotting subroutines perform the f.aictions 
of creating a part of the finished picture, e.g., axes, 
labelling, curves, points, etc. and in so doing generate 
plotter word groups which the system considers as punched 
output (thereby allowing plotter output to be filed - 
see TN-39)* The arguments of all the subroutines may 
be constants, subscripted variables, or nonsubscripted 
variables except where otherwise noted. The names 
assigned to variables throughout this description agree 
in mode with the modes (fixed or floating) which must 
be used when the subroutine Is called. It should also 
be noted that all floating point variables must be in 
single precision. 

The following plotter subroutines (described more 
fully later) are available: 

PLOTS (A, B) 

PLOTS must be the first routine called when 
these plot routines rre used. PLOTS Initializes 
certain variables used in the plotting routines 
and creates ‘h' ) (PLOTPILE header records. 

SYMBOL (X, Y, HEIGHT, BCD, THETA, N) 

SYMBOL draws titles and other identification or 
lettering on a graph. 
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PLOT (X, y, KPEN) 

PLOT is a general purpose routine used by both 
the programmer and the other plotter subroutines 
to draw points and the lines connecting points. 


PLTEND 

PLTEND must be called at the end of every plotting 
program. 

These four routines are all Cornell system routines. The 
following routines are the Cal Tech routines (modified 
to work on the Cornell system). 

LABEL (X, y, XMN, XMX, SIZE, NI, TITLE, NCT, ND) 

LABEL draws a horizontal or vertical axis with 
tick marks, labels at the tick marks and title. 

Its CP name is LABL. 

LOGAXS (X, y, PL, ID, NUMDEC, IHIGH, ILBL, TITLE, 

NCT, IROT, NTICK) 

LOGAXS draws a logarithmic axis with tick marks, 
decade labels and ♦'itle. Its CP name is LOGA. 

PRTNUM (X, y, SIZE, NUM, PMT, THETA) 

PRTNUM plots numbers on the plot using a user 
provided format. Its CP name is PRTN. 
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PLOTXY (N, X, Y, XMH, XMX, YMM , YMX, LAB, IP, ISYS, 

ISP, DD) 

PLOTXY plots the array (X, Y) as a continuous 
lint;, as points, or as a combination. Its CF name 
is XYPL. 

EBPLOT (N, X, Y, XMIN, XMAX, YMIN, YMAX, LAB, ISYM) 
EBPLOT plots an array of points and their 
associated error bars. Its CF name is EBPL. 

INTPLT (NI, NO, KTYPE, N, XX, YY, XMIN, XMAX, YMIN, 
YMAX, LAB) 

INTPLT Interpolates points jnto an array of 
(XX, YY) points so that a smooth curve may be 
plotted. Its CP name is INTP. 

Since each of the subroutines performs a unique function, 
the user rieeds to call only those routines necessary for 
the successful construction of his plot. 

A more detailed description of each subroutine follows. 
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PLOTS 


PLOTS must be called before any of the other 
plotting routines, PLOTS initializes some of the variables 
used in the rest of the routines and creates the ) (PLOTFILE 
header records. 

CALLING PROCEDURE: 

ihe PLOTS subroutine is called by th'^ itatement 
CALL PLOTS (A, B) 

where 

A and B are dummy variables, and can be any variable name 
the user chooses, as long as they have no meaning, i.e., 
do not correspond to the names of any actual variables 
used in the other plot routines. 


DESCRIPTION ; 
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SYMBOL 


SYMBOL furnishes the capability of drawing letters, 
numbers, and certain special characters as identification 
or titles on graphs. 

CALLING PROCEDURE: 

The subroutine is called by the statement: 

CALL SYMBOL (a, Y, HEIGHT, BCD, THETA, N) 

where 

X = X-coordlnate in inches of the lower left-hand corner 
of the first character. 

Y = Y-coordinate in Inches of the lower left-hand co.'*ner 
of the first character. 

HEIGHT = height in inches of the character to be drawn. 
Most symbols are drawn with their lower left-hand comer 
at the coordinates (X, Y) and are drawn on a 6 x 7 grid; 
the true plotted height will be an Integer multiple of 
.07 inches. Special "centered” symbols (numbered 0-13) 
are drawn on a 4 x ^ grid with their center at coordinate 
(X, Y) ; the true plotted height will be a multiple of 
.04 Inches. 
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BCD = normally a character string, l.e,, *abcd', etc., 
and represents the symbol to be printed. To plot 
a symbol by its code value, the value must be put into 
the first byte of 'BCD' by some means such as 

INTEGER*2 BCD 
BCD = L*256 

where L Is the value of the symbol. 

THETA = the angle of rotation, counter-clockwise, in 
degrees between the X-axis and the line along which the 
characters are to be drawn. 

N ® the number of characters in the BCD character string. 
In addition, i^ N Is made negative the pen will be put 
down rather than picked up before going to (X, Y) to draw 
the symbols specified in BCD. 
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EXAMPLES : 


The following statement will draw the letters 
’THIS IS A GRAPH' at an angle of degrees across 
the paper in 1/2 inch letters, starting at (0.1, 3.1)* 

CALL SYMBOL (.1, 3.1, .5, 'THIS IS A GRAPH', i<5., 15) 

If Instead the words 'THIS IS A GRAPH' have been read in 
A-format into an array TITLE, the following statement is 
used: 


CALL SYMBOL (.1, 3.1, 15 TITLE, il5. , 15) 

The following statement will draw symbol number 52 with 
height of .5 inches at the point (5., 7.3). Note that 
the symbol number must be left-justified. 

INTEGER*2 BCD 
BCD = 52*256 

CALL SYMBOL (5-, 7.3, .5, BCD, 0., 1) 
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TABLE OF SYMBOLS 


0 

SQUARE-CENTERED 

24 

UNDERSCORE 

1 

OCTAGON- CENTERED 

25 

DOUBLE UNDERSCORE 

2 

TRIANGLE-CENTERED 

26 

OVERSCORE 

3 

PLUS-CENTERED 

27 

INTEGRAL 

i| 

X-CENTERED 

28 

IMPLIES 

5 

DIAMOND-CENTERED 

29 

OR 

6 

UP ARROW-CEN" lED 

30 

WAVE 

7 

BAR X-CENTERED 

31 

DOUBLE WAVE 

8 

Z- CENTERED 

32 

RIGHT BRACKET 

9 

Y-CENTERED 

33 

LEFT BRACKET 

10 

SQUARE X-CENTERED 

34 

MU 

11 

ASTERISK-CENTERED 

35 

PI 

12 

DOUBLE BAR X-CENTERED 

36 

PHI 

13 

VERTICAL-CENTERED 

37 

THETA 

14 

STAR 

38 

PSI 

15 

HORIZONTAL VECTOR 

39 

CHI 

16 

VERTICAL VECTOR 

40 

OMEGA 

17 

BACKSPACE 

41 

LAMBDA 

18 

CARAT 

42 

ALPHA 

19 

EQUIVALENCE 

43 

DELTA 

20 

RIGHT ARROW 

44 

EPSILON 

21 

CARRIAGE RETURN 

45 

ETA 

22 

NOT EQUAL 

46 

SUPERSCRIPT 

23 

PLUS MINUS 

47 

SUBSCRIPT 
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TABLE 

OF SYMBOLS (continued) 



li8 

SUMMATION 

73 

I 

49 

DIVIDE 

74 

CENT 

50 

LESS THAN OR EQUAL 

75 

ARROW 

51 

GREATER THAN OR EQUAL 

76 

LESS 

52 

DELTA 

77 

LEFT PARENTHESIS 

53 

LEFT E JE 

78 

PLUS 

54 

RIGHT BRACE 

79 

VERTICAL 

55 

REVERSE SLASH 

80 

AMPERSAND 

56 

GAMMA 

81 

J 

57 

SQUARE ROOT 

82 

K 

58 

VERTICAL WITH 2 HORIZ 

83 

L 

59 

VERTICAL WITH 3 HORIZ 

84 

M 

60 

LEFT ARROW 

85 

N 

61 

TIMES 

86 

0 

62 

UP AIROW 

87 

P 

63 

DOWN ARROW 

88 

Q 

64 

BLANK 

89 

R 

65 

A 

90 

EXCLAMATION 

66 

B 

91 

DOLLAR SIGN 

67 

C 

92 

ASTERISK 

68 

D 

93 

RIGHT PARENTHESIS 

69 

E 

94 

SEMICOLON 

70 

P 

95 

NOT 

71 

G 

96 

MINUS 

72 

H 

97 

SLASH 
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TABLE OF SYMBOLS (continued) 


98 S 

121 

99 T 

122 

100 U 

12 3 

101 V 

12 ii 

102 W 

125 

103 X 

126 

lOi) Y 

127 

105 Z 


106 INFINITY 


107 PER CENT 


108 COMMA 


109 DASH 


110 GREATER THAN 


111 QUESTION 


112 0 


113 1 


lU 2 


115 3 


116 


117 5 


118 6 
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COLON 

POUND 

AT 

APOSTROPHE 

EQUAL 

QUOTATIONS 


119 7 

120 8 


12 


taule of valid CF^RACTERS 
(’symbol' Output) 


<0 0 *A '^■'X *Z*Y 

IS I "^6 'iBI 17 IbAiS — 


'K’Y 



?^ 23 ± 


20 ^21 22 7^23—2^ 25 2B 270 26 


J^26^M V 


30 


MO 
SO 
50 
70 
80 
90 
1 

110 


^ 33 {^3H Mss TT 36 037'©‘36 ^ 

^M1 Xm 2^M3 &MM '^‘^5 "^N6 M7 
^51 —52 Z\s3 [Z 6M ZlcsXseTsY Lt 59 ^ 

■"^""61 Xfi2. 1 63 ^^RssBsiCeoDeaE 
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JU lOiViciAlicnXicHTiosZiof^ioTj lofc^ioo 
lIlTlIgDiial llM2lls3u64l175Ma6M9T 

12 ^ 121 Qi 22 b 123 ^ 129 ® 


125 12S-127 
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PLOT 


DESCRIPTION : 


PLOT subroutine is used to move the pen from its current location 
to a point specified by the user. The user must also 
specify whether the pen is on the paper (and will draw 
a line) or off the paper when it moves. 


CALLING PROCEDURE: 

The subroutine is called by the statement: 

CALL PLOT (XCORD, ^C^RD, KPEN) 

where 

XCORD = X-coordinate in inches of the point to which the pen 
is to move from its present position. 

YCORD = Y-cooi‘dinate in Inches of the point to which 
the pen is to move from its present position. 

KPEN = a signed control digit specifying whether the pen 
is to be on or off the paper while moving to the point 
defined by XCORD and YCORD. The following options are 
available; +1, -1, +2, -2, +3| -3» where; 

+ = more points to be plotted in this picture 
- = the point associated with this KPEN value is 
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the last to be drawn on this picture and will be 
considered the "zero" point of the next plot. 

1 = the pen position (up or down) remains unchanged, 
l.e, , the pen will remain as it was at the end of 
the previous operation. 

2 = the pen will move in the down position (on the 
paper) and a line will be drawn. 

3 = the pen will move in the up position (off the 
paper) and no line will be drawn. 

NOTE : 

PLOT can be used (with negative KPEN) to terminate a set 
of plots and reset the pen in a suitable position for a 
subsequent set of plots, 

EXAMPLE : 

CALL PLOT (9.3, 2.6, -3) 

The pen will move to coordinates (9*3, 2.6) with the pen 
in up position. Since the sign associated with KPEN is 
negative, the coordinate system will be reset to zero 
when the pen reaches (9.3, 2.6), l.e. , this point will be 
the new (0.0, 0.0) for the next picture. 


LABEL 


USAGE : 

CALLING SEQUENCE: 

CALL LABEL (X, Y, XMN, XMX, SIZE, NI, TITLE, NCT, ND) 

where : 

X, Y = starting point of axis, in inches 
XMNjXMX “ range of axis (first and last values, printed 
at the beginning and end of axi” ) 

SIZE = length of axis, in inches 
NI = number of intervals along axis 

If this value is too large to allow printed 
label, or is negative, only tick marks will 
be made. 

TITLE = Hollerith title to be printed along axis 

NCT = number of characters Including blanks, of TITLE 
NCT positive = Title will be printed below the X-axis or to the 

left of the Y-axis 

NCT negative = Title will be printed above the X-axis or to the 

right of the Y-axis 
NCT = 0 - no title will be printed 
ND = 0 axis will be drawn horizontally 
“ 1 axis will be drawn vertically 

or : 

CALL VLABEL (X, Y, XMN , XMX, SIZE, NI , TITLE, NCT, 

ND, PMT, LP) 

Normally, the magnitude of the numeric labels along the 

axis drawn is scaled to a value which lies between 0 and 
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9.999 and then the format P6.3 Is used to plot the label. 

To some users, neither the scaling nor the format adopted 
may prove desirable. Two more arguments are therefore 
added to provide more flexibility in labeling: 

FMT * a one-dlmenslonal EBCDIC array where the 

format is stored. The format will be used in 
labeling. FMT is of the following form: (F n. m) 
FMT must be dimensioned, even if only for 
(1). Note: Be sure to Include parentheses, 

where : 

n “ is the field length, which must Include 

a position for the sign and a position for 
the decimal point (m may be zero), 
m - is the number of decimal places after the 
decimal point (m may be zero). 

LF = an integer specifying the field length of the 

format provided (LF = n). However, if the user 
wishes to print out an Integer value, without 
the decimal point, LF should be set equal to n-1. 

NOTE: 

When FMT and LP are provided are provided in the calling 
sequence the numeric labels will not be scaled, therefore 
the user must provide a format with sufficient field length. 
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If the space between Intervals Is not large enough for 
the printing of the values, there may be overlapping of 
the first and second printings. 

To avoid this, the following formula must be true: 

Space > (n + I) * 0.12 

where : 

Space = value of the Interval in inches 

n = field length in the format statement (i.e. Fn.m) 
I = number oi digits to the left of the decimal 
point in the second value to be printed. 

NOTE; 

Letter sizes have been set as follows: 


Numeric label along axis 

= 0.12 

Title 

= 0 . 16 

Scale factor 

= 0.10 


If the user wishes to alter any or all of the sizes, 
he may make use of the labeled common statement, 
COMMON/LBLCOM/ITEST , SLBL, STTL, SSCL 
where : 

ITEST must be set = 1 
SLBL = size of numeric label 

STTL = size of title 

SSCL = size of scale 

These are real values in inches and must all be 
defined ever if only one or two values are to be altered. 
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User must be cautioned not to exceed boundaries of 


paper. 
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LOGAXS 


USAGE 

CALL LOGAXSCX, Y, FL, ID, NUMDEC, THIGH, ILBL, TITLE, 
NCT, IROT, NTICK) 

where 


X,Y = 
PL = 
ID = 


NUMDEC = 


IHIGH = 
ILBL = 


TITLE = 
NCT = 


> 


Starting point of axis, in inches. 

Length of axis, in Inches. 

Angle of axis in multiples of 90°, i.e. 

ID = 1, angle « 90° 

Number of decades along the axis. 

(number of intervals between cycles) 

NUMDEC - positive - Scale increases from 
(X, Y) to other end of axis. 

NUMDEC - negative - Scale decreases from 
(X, Y) to other end of axis. 

Power of ten at opposite end of axis from (X, Y) . 
0 Labels printed for decades. 

/ 0 Labels not printed for decades. 

EBCDIC characters to be printed along the axis. 
Number of characters in TITLE. 

0 TITLE plotted parallel to axis 


« 0 No TITLE plotted 


IROT = Angle of numeric labels for decades with 
respect to angle of axis in multiples 
of 90° measured CCW 
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NTICK = Location of labels and tick marks with 
respect to axis 

NTICK “ +1 Labels plotted below or to right of 
axis; ticks above or to left of axis 
NTICK = -1 Labels plotted above or to left of 

axis; ticks below or to right of axis 

NOTE; 

Letter sizes have been set as follows 
Numeric label along axis = 0.12 
Title = 0.16 

Tick Marks =0.20 

If the user wishes to alter any or all of the sizes, 
he may make use of the labelled common statement 
COMMON/LOGCOM/ITEST, SLBL, STTL, STICK 

where 

ITEST must be set = 1 
SLBL = size of numeric label 

STTL = size of title 

SSCL = size of tick 

SLBL, STTL, and SSCL are all real numbers in inches and 

must all be defined even if only one or two vali’.es are 


to be altered. 
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PRTtJUM 

USAGE: 

Calling sequence 

CALL PRTNUM (X, Y, SIZE, NUM, FMT, THETA) 

where 

X, y « position. In Inches, of the lower left corner 

of the first digit of NUM (including alphameric 
information If any). 

SIZE = size in inches of digits of NUM. 

NUM *= number (integer, real or EBCDIC) to be plotted. 

FMT = dimensioned array containing the format (in 
EBCDIC form) with which NUM is plotted. FMT 
must be dimensioned, even if only for (1). 

THETA = angle in degrees in which NUM is plotted, with 
respect to the horizontal direction, counter- 
clockwise 

EXAMPLE : 

CALL PRTNUM (13., 9-,. 15, NP, * (9HPLOT_NO._13) ' , 0 . ) 

If NP = 15, the above statement would result in the plotting 

of: 

PLOT_NO. 15 

in the upper right comer of the plotting paper. 

The same result could be obtained by the following statements: 

DIMENSION FMT (4) 

DATA FMT/4h(9HP, 4HL0T , 4HNO. , 3HI3)/ 

PRTNUM (13., 9.,. 15, NP, FMT, 0.) 


CALL 
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USAGE; 


PLOTXY 


Calling sequence 

CALL PLOTXY(N, X, Y, XMN, XMX, YMN, YMX, LAB, IP, 
ISYS, ISP, DD) 


where 


N = 
X = 
Y « 
XMN , XMX = 

YMN, YMX = 

LAB = 
> 

IP = 


ISYS = 


ISP = 


size of array to be plotted 

array of abscissa coordinates 

corresponding array of ordinates 

values of X at left and right edges of 

plotting area, respectively 

values of y at bottom and top edges of 

plotting area, respectively 

0 plot on same sheet of paper 

this is last plot on current sheet of paper 

0 point plot only (needs ISYS) 

1 line plot only (Ignores ISYS and ISP) 

2 line point and line plot (needs ISYS and ISP) 

0 through 13, determines which symbol is 

to be used in point plot. These correspond 
to the first l4 values of SYMBOL. If IP = 1, 
this argument is ignored. 

spacing point plot for TP = 2. For example 
(in addition to line plot) 

If ISP ■ 1, every point will be plotted 

If ISP = 2, every second point will be plotted, etc. 
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DD « One-dlmencional array of length 2. If 
DD (1) / 0, DD (1) and DD (2) will be 
treated as 8 EBCDIC characters and plotted 
on the upper right comer of graph paper 
at the end of each plot (when LAB / 0). 

If DD (1) * 0, such plotting will be sup- 
pressed. 

NOTE: 

1) All arguments must be present, even If they are not 
used. 

Normally, PLOTXY plots on an area of 15 Inches by 
10 inches, where 15 inches is the length along the 
X-direction and 10 Inches the width along the Y-direction. 
If the user wishes to alter these dimensions, he can enter 
the information through a labeled COMMON in the calling 
program, as follows; 

COMMON/COMPXY/ITEST, XLNGTH, YLNGTH 

where 

ITEST must be set “ 1 

XLNGTH = altered X-length in inches 

YLNGTH “ altered Y-length in inches 
NOTE; Both values must be provided even if only one is to 


be altered. 




EBPLOT 


USAGE i 

Calling sequence 

CALL EBPLOT (N, X, Y, DY, XMIN, XMAX, YMIN, YMAX, 

LAB, ISYM) 

where N = Length of array of points 

X, Y = Array coordinates of the center of the 
central symbol. 

DY «= Array distance from the center of the central 
symbol to the vertical extreme of either 
error bar, .Relative to YMIN and YMAX. 

XMIN = X“Value for left-hand edge of plotting area. 

XMAX = X-value for right-hand edge of plotting area. 

YMIN = Y-value for bottom edge of plotting area 
YMAX = Y-value for top edge of plotting area 
LAB = Page contixjl 

=0, this plot is not the last plot on the 
graph sheet. 

> 0, last plot on the graph sheet. 

0£lSYM<^13 designating symbol to be used for central symbol. 

If ISYM < 0, number 0 Is used. These are 
SYMBOL symbols 0-13. 

The subroutine normally plots on ar. area of 15 Inches 
by 10 Inches. 


NOTES : 


1 . 
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2 , The central symbol size is «08 Inches. 

3. If the center of the symbol lies outside 
the plotting area, the point is not plotted 
and the comment 

POINT OFF SCALE IN EBPLOT 
is printed on the user's output. 

If an error bar extends beyond the plotting 
area, the portion lying outside the plotting 
area is omitted. 

5. If the error bars are smaller than the central 
symbol, they are not plotted. 

6. Plotting time is minimized if the user 
orders his points such that X increases 
monotonically . 

If the user wishes to alter the plotting dimensions, he can 
enter the information through a labeled COMMON in the 
calling program as follows: 

COMMON/COMEB/ITEST, XLNGTH, YLNGHT 

where 

ITE.5T must be set «1 
XLNGHT * altered X-length In inches 
YLNGTH = altered Y-length in inches 
Note that all values must be provided e if only one is to 


be altered. 


INTPLT 


PURPOSE: 

To take a one dimensional array which Is to be 
plotted and interpolate enough values to produce a smooth 
curve on the XY plotter. Produces linear scale, semi-log, 
or log-log plots as desired 

METHOD: 

The program takes logarithms of the input X and Y 
arrays and the maximum and minimum values of X and Y 
if requested in the calling sequence. If there are 
more than (NO -D/2 values of X-Y given, the curve is 
immediately plotted. If not, the program produces NO values 
of X, putting ( —" y) new points between each pair of the 
NI values of X in the original array. order interpolation 

by the Aitken method is performed to give Y at each new 
X value. The resulting curve is plotted 

USAGE: 

Calling sequence 

CALL INTPLT (NI, NO, KTYPE, N, XX, YY , XMINI, 

XMAXI, YMINI, YMAXI, LAB) 

where 

NI = integer giving the number of values in the XX array 

which are to be included in the interpolation routine. 
NI must be less than 1501. 
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NO » integer giving total number of output points 
desired. NO must be less than 1501. 

KTYPE = integer, specifies type of graph desired 

1 for plot of Y vs. X 

2 for plot of log^^Y vs. X 

3 for plot of Y vs. log^^X 

4 for plot of log^j^Q Y vs. log^QX 

N » order of the Interpolation done on the input 
points . 

XX = one dimensional, real array containing values of 
X-coordlnate which increase monotonic ally . 

YY = one dimensional, real array containing values of 
Y-coordlnate , where YY(I) corresponds to point 
XX(I) . 

XMINI * real number, X-value for left-hand edge of graph 
paper. 

YMAXI *= real number, X-value for right-hand edge of graph 
paper. 

YMINI = real number, Y=value for bottom edge of graph paper 
YMAXI - real number, Y-value for top edge of graph paper 
LAB = integer, page control 

= 0 if this is not last plot on page 
> 0 if it is last plot on page 

NOTE: 

1. Any points with X values greater than XMAXI will 
not be plotted. 
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2. Normally XYPLOT plots on an area of 15 inches by 
10 inches, where 15 Inches is the length along 
the X-direction and 10 Inches the width along 
the I'-direction, If the user wishes to alter 
these dimensions, he can enter the information 
through a labeled COMMON in the calling program 
as follows : 

COMMON/COMPLO/ITEST, XLNGTH, YLNGTH 

where 

ITEST must be set = 1 
XLNGTH = altered X-ler.gth in inches 
YLNGTH = altered Y-length in inches 
Both values must be provided even if only one is 


to be altered. 
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NOTES, COMMENTS AND SUGGESTIONS 

1) The programs PRTNUM, LABEL, and LOOAXS all use a 
subprogram, OUTCOR which is stored in CF OUTC. If 
any one of thece three I’outines is used, OUTCOR must 
be included also. 

2 ) The plotting paper is fan- folded, each page being 

11" high and long 



Grid paper has a 10 x 10 to the inch grid printed along 
it between B and C 

3) When a plot is started, the pen is Initially placed 
by the operator at point A for plain paper and at point 
B for grid paper. This defines the initial (0, 0) point. 
If a call is made to LABEL or LOGAXS for a horizontal 
axis with point A as the origin, the label will not be 
printed correctly as part of the label is below the axis 
and hence off scale on the paper (see comment #5 below). 
Similarly, if a vertical axis is drawn with either point A 
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or B as its origin, part of the axis label will be on 
one sheet of paper and part on the preceeding page. 

If the origin is at point E, however, both axes will 
plot correctly. Therefore, is axes are to be put on 
the plot, one should CALL PLOT (1., 0., -3) before 
drawing labels or plotting on grid paper or CALL PLOT 
(l., 0.5, -3) before drawing labels or plotting on 
plain paper. In both cases the origin will then be 
reset at point E (see writeup for PLOT). This call 
also will center a standard 10" x 15" plot on two sheets 
of 11" X paper. 

4) If the LAB parameter is greater than zero in calls 
to PLOTXY, EBPLOT, and INTPLT, the plotter will finish 
the current plot and then move to a new origin on a 
clean sheet of paper In preparation for the next plot. 

If the old origin was at point E, it will move to point 
E on a new page. Therefore the call to PLOT does not 
have to be repeated. Similarly, if the old origin was 

at point A, B, or any point Q on the page, it will rezero 
at the corresponding point on a clean page. 

5) If a point on the plot goes offscale in the +Y or -Y 
directions, all sucessive points will be plotted incorrectly. 
For example, assume that the Y coordinate runs from 0.0 

to 1.0 unit and is 10" long. We wish to plot points 
with Y coordinates of 0.5, 1.0, 1.5, and 0.5 units. The 
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first two points will plot correctly, but the third will 
go up against the limit of travel at the upper perforation. 
When the pen then moves from the third to the fourth point, 
it will attempt to move down one unit (i.e., 10"). However, 
since it is not really 0,5 unit (5‘*) above the perforation, 
it will move down 10" from its current position (on the 
upper perforation) and plot the last point near the bottom 
of the paper. All succeeding points will also be in error. 

6) Point plots take considerably more time than line 
plots 

7) The length of an EBCDIC character string is 6/7 x N x 
SIZE since each letter is 6/7 * SIZE in width. 

8) Since the system thinks that it is punching cards 
when it plots, it is recommended that the CARDS parameter 
on the limits card be raised from its default value of 500. 

9) When using the plotting routines and the labelling 
routines, make sure the minimum and the maximum values 
passed to both routines are the same. Also, be sure the 
lengths are the same. Othei^lse, the plotted points 
and their labels will not correspond. 

10) The plotting surface in the Y direction is not quite 

11" long, so that using grid paper, for example, one can only 
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plot approximately 0.*'^ above and below the grid. If 
this is not wide enough, there is a 20” plotter In Upson 
which may be used. 

11) In addition to the routines which have been discussed, 
there exist programs for drawing countours and three 
dimensional surfaces. Dale Pletlcha has copies of the 
contour plotters and I have a copy of the 3D plotting 
routine. 

12) The plotting routines take only modest amounts of 
core (LABEL 7K, LOGAXS 5K, PLOTXY 2K. All the 
others take less than 2K) and add only a few seconds 
compute time to a Job (see example). 

13) Even though a program has the plot routines written 
into it, the plotter may be "tiirned off" by the following 

li 

substitution; || 

Replace //GO.PT98F001 DD SYS0UT=P 

with //GO.PT98P001 ii DD DUMMY ,DCB=BLKSIZE= 80 

The program will run exactly as before, except than no 
plotter output will be produced. 

Acknowledgements 

This work was supported in part by the Atmospheric 
Sciences Section of the National Science Foundation Grant 
GA 23945 and in part by NASA Grant NGR-33-010-082 . 


33 

EXAMPLE 


The following program is an example of the use of 
several of the plotting routines. The program took 
3,5 seconds to execute and 4 minutes to plot (at a cost 
of $10.00 per plot-hour). 
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